home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 6
/
FM Towns Free Software Collection 6.iso
/
t_os
/
cutf
/
asm
/
sakick2.hd6
< prev
next >
Wrap
Text File
|
1993-07-08
|
2KB
|
147 lines
ds_name db 'MOZCF\SAKICK',0
look_me:
call sub_esi
dd 0,0
dw 1,0 ; wind need
dw 649,379,0,50 ; sz_x sz_y off x off y
dw 0,0 ; waku iro meniro
dw 0,0
paint_wd:
SET_P ndkan
SET_P nddak
SET_P d_ura
WD_LEFT
ret
re_paint:
ret
mouse_in:
ret
d_ura:
call sub_edi
dw 0
db 'URA',0
be_called:
KAKU word ptr 300,1000
CALL_P d_ura
call mozidt_d
KAKU 384,edi
CALL_P nddak
YOMU ax,382
cmp ax,1
je dirok
cmp ax,3
je be_called
dirchg:
MOZI mozi_dir
CALL_P ndkan
cmp edx,0 ; not dir
; jne dirnot
jne be_called
YOMU dx,300 ; cancel
cmp dx,0
jne be_called
YOMU edx,304
YOMU edi,404 ; f_name2 xxdr_name
; call dr_name ; edi
drin0:
mov al,[edx]
mov [edi],al
inc edi
inc edx
cmp al,0
jne drin0
sub edi,2
drin22:
YOMU edx,408
; call f_namef
drin23:
mov al,[edx]
mov [edi],al
inc edx
inc edi
cmp al,0
jne drin23
WD_ERZ 0
ret
;dirnot:
;
; YOMU edx,304
; YOMU edi,404 ; f_name2 xxdr_name
; jmp dirok0
dirok:
YOMU edx,400 ; f_name1
YOMU edi,404 ; f_name2 xxdir_name
dirok0:
mov al,[edx]
mov [edi],al
inc edx
inc edi
cmp al,0
jne dirok0
dirok1:
dec edi
mov al,[edi]
cmp al,'\'
jne dirok1
jmp drin22
p_call:
M_P_CALL
p_set:
M_P_SET
ndkan:
call sub_edi
dw ?
db 'KANU',0
nddak:
call sub_edi
dw ?
db 'DAKUHI2',0
mozidt_d:
call sub_edi
db '分割FILEは同じディレクトリ',0
db ' OK 変える ',0
mozi_dir:
call sub_edi
dw 0,15,200,80,0,20,8
db '分割されたファイルを複写するディレクトリを',0
db '選んでください',0
db ' ',0
db '方法は',0
db ' 1. <.>を押してから、下で決定',0
db ' 2. ファイル名がないところを押してから下で決定',0
db ' 3. 一度外に出て入り直してから下で決定',0
db 'いずれも<*.*>で決定です',0